home *** CD-ROM | disk | FTP | other *** search
- object frmMain: TfrmMain
- Left = 250
- Top = 196
- Width = 336
- Height = 228
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = 'aPLib test'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 328
- Height = 201
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 2
- object Label2: TLabel
- Left = 158
- Top = 8
- Width = 97
- Height = 38
- Caption = 'aPLib'
- Font.Charset = ANSI_CHARSET
- Font.Color = clGray
- Font.Height = -32
- Font.Name = 'Verdana'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label1: TLabel
- Left = 154
- Top = 4
- Width = 97
- Height = 38
- Caption = 'aPLib'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -32
- Font.Name = 'Verdana'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label5: TLabel
- Left = 176
- Top = 48
- Width = 98
- Height = 13
- Caption = 'the smaller the better'
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 80
- Width = 313
- Height = 65
- Caption = ' Progress '
- TabOrder = 0
- object Label3: TLabel
- Left = 104
- Top = 40
- Width = 28
- Height = 13
- Caption = 'Ratio '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 152
- Top = 40
- Width = 81
- Height = 13
- Caption = ' '
- end
- object PB: TProgressBar
- Left = 15
- Top = 25
- Width = 282
- Height = 9
- Min = 0
- Max = 100
- TabOrder = 0
- end
- end
- object CancelBtn: TButton
- Left = 131
- Top = 164
- Width = 75
- Height = 25
- Caption = 'Cancel'
- Enabled = False
- TabOrder = 1
- OnClick = CancelBtnClick
- end
- end
- object Button1: TButton
- Left = 16
- Top = 16
- Width = 75
- Height = 25
- Caption = 'Compress'
- TabOrder = 0
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 16
- Top = 48
- Width = 75
- Height = 25
- Caption = 'Decompress'
- TabOrder = 1
- OnClick = Button2Click
- end
- object aPLib: TaPLib
- Left = 240
- Top = 160
- end
- object OD: TOpenDialog
- Left = 280
- Top = 160
- end
- end
-